Chip 2003 November/Chip_2003-11_cd1.bin/program/delphi/kompon/BalmsoftPolyglot.exe/{app}/Demos/Delphi 5-7/bsPolyglotDemoFrm.dfm

Text File | 2003-08-15 | 8KB | 317 lines

object bsPolyglotDemoForm: TbsPolyglotDemoForm
  Left = 229
  Top = 141
  BorderStyle = bsDialog
  Caption = 'Balmsoft Polyglot Demo'
  ClientHeight = 434
  ClientWidth = 425
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 86
    Height = 13
    Caption = 'Choose language:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 200
    Top = 8
    Width = 183
    Height = 13
    Caption = 'Strings are supported without limitation:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 16
    Top = 304
    Width = 162
    Height = 52
    Caption =
      'Very very long'#10#13'multi line labels or '#10#13'any other text with speci' +
      'al symbols'#10#13'are also supported'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object cbLanguages: TComboBox
    Left = 32
    Top = 32
    Width = 145
    Height = 21
    Style = csDropDownList
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 0
    OnChange = cbLanguagesChange
  end
  object Memo1: TMemo
    Left = 200
    Top = 24
    Width = 217
    Height = 73
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Lines.Strings = (
      #9'<-Here is Tab symbol'
      'Use commas ,,,,,,,,,,,,,,,,,,,,,,'
      'or quotation marks '#39'  '#39'  '#39'  '#39'  '#39'  '#39
      'or double quotes "  "  "  "  "  "  "'
      'no special limitations')
    ParentFont = False
    TabOrder = 1
  end
  object Button1: TButton
    Left = 16
    Top = 64
    Width = 140
    Height = 25
    Caption = 'Size can vary'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = Button1Click
  end
  object Panel1: TPanel
    Left = 16
    Top = 112
    Width = 401
    Height = 185
    Caption = 'Panel1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object Panel2: TPanel
      Left = 8
      Top = 8
      Width = 385
      Height = 169
      Caption = 'Panel2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object Label4: TLabel
        Left = 8
        Top = 8
        Width = 366
        Height = 13
        Caption =
          'It is possible to translate column captions as well as any other' +
          ' collection items.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object DBGrid1: TDBGrid
        Left = 8
        Top = 24
        Width = 369
        Height = 137
        DataSource = DataSource1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        PopupMenu = DataModule1.pmnu
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'FirstName'
            Title.Caption = 'First Name'
            Width = 91
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'LastName'
            Title.Caption = 'Last Name'
            Width = 123
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Salary'
            Width = 88
            Visible = True
          end>
      end
    end
  end
  object ComboBox1: TComboBox
    Left = 200
    Top = 304
    Width = 217
    Height = 21
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 4
    Text = 'ComboBox1'
  end
  object RadioGroup1: TRadioGroup
    Left = 200
    Top = 336
    Width = 217
    Height = 89
    Caption = 'RadioGroup1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemIndex = 0
    Items.Strings = (
      'Item 1'
      'Item 1'#39
      'Item 1 , Item 2')
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 5
  end
  object Button2: TButton
    Left = 16
    Top = 368
    Width = 169
    Height = 25
    Caption = 'Show Message'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 16
    Top = 400
    Width = 75
    Height = 25
    Action = Action1
    TabOrder = 7
  end
  object Button4: TButton
    Left = 112
    Top = 400
    Width = 75
    Height = 25
    Action = Action2
    TabOrder = 8
  end
  object ds: TADODataSet
    Parameters = <>
    Left = 240
    Top = 208
    object dsFirstName: TStringField
      FieldName = 'FirstName'
      Size = 50
    end
    object dsLastName: TStringField
      FieldName = 'LastName'
      Size = 50
    end
    object dsSalary: TCurrencyField
      FieldName = 'Salary'
    end
  end
  object DataSource1: TDataSource
    DataSet = ds
    Left = 208
    Top = 200
  end
  object bsPolyglotTranslator1: TbsPolyglotTranslator
    Manager = DataModule1.PolyglotManager
    Left = 352
    Top = 368
  end
  object MainMenu1: TMainMenu
    Left = 144
    Top = 64
    object Action11: TMenuItem
      Action = Action1
    end
    object Action21: TMenuItem
      Action = Action2
    end
  end
  object ActionList1: TActionList
    Left = 136
    Top = 216
    object Action1: TAction
      Caption = 'Action1'
    end
    object Action2: TAction
      Caption = 'Action2'
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 56
    Top = 96
    object Action12: TMenuItem
      Action = Action1
    end
    object Action22: TMenuItem
      Action = Action2
    end
  end
end